Top 10k strings from MicroHobby Semanal - Issue 057-060 (1985)(Hobby Press)(es)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
11 ;" PARE LA CINTA ":
4 PANTALLAS=1
3 PANTALLAS=5
3 A$=A$(b(posx)+1
3 "Valor de a ? (entre 1 y 5) ";a
2 y(nd2,n)=y(nd2-1
2 u$(z)=u$(z)(
2 PANTALLAS=3
2 PANTALLAS=2
2 ;"DERIVADA";
2 (NPROG/DOS)
2 "v=v0+a*t"
2 "Numero entre 1 y 22 ?";a:
2 "22",CERO;B$:
1 z(n);", ";:
1 y$=(y$+" ")(1
1 y$)*(z$(pr,m
1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz
1 s=((v)-v0)/2/aK
1 q(e$(i))=1
1 p(n,col2)=p(n,col1):
1 p(n,col)=d(n,der+1
1 p(itas)=p(itas)-(p(itas)-z)*(incog=0
1 nzr=gra3-1
1 niv=orden:
1 n;" < Este es su numero"
1 linea=linea+1
1 k$=z$(pr,m
1 k$=k$+"+"+a$+")":
1 jj=d(n,der+1
1 j$=j$+"+"+a$+")":
1 j$=j$+"+"+a$+")"
1 j$=j$+"(x*":
1 j$=j$+"(x*"+a$:
1 itas=itas+1
1 i$-(p=fin)))=0
1 h1s u1h2s u2x1s u1x2s u2v a s s a t v a t a F1Tca F2Tca F1F2N1m1u1N2m2u2F1w1N1F2w2N2
1 gra3=gra3-1
1 e$=i$+"="+b$:
1 d=d-(u$(z,3
1 d=d+(u$(z,3
1 d(nd1,der+1
1 d(n,deriv+1
1 d(n,der1+1
1 d(m,deriv+1
1 cuenta=cuenta-1
1 cuenta=cuenta+1
1 c(m)=c(m)+(
1 c$=c$+A$(b(i)
1 c$=c$+"^"+A$(b(i)+1
1 b(i)=b(i+1
1 b(i)=b(i)+1
1 an2=-ag*sg-
1 an1=ja-ag*sg+
1 ag=u2-.001
1 ag=u1-.001
1 a$=a$+"CANDELABROS Y TIENE COMO LOS DEMAS PISOS 25 SALAS. EL PISO 3 ES TAMBIEN DE VAMPIROS. Y EL PISO 4 ES EL DE LAS HABITACIONES OSCURAS Y DONDE REPOSA DRACO EN SU ATAUD. SUERTE VALIENTE... "
1 a$=a$+" PARA ELLO DEBERAS ENCONTRAR LA CRUZ CON LA QUE PODRAS LUCHAR CARA A CARA CON DRACO. PERO PARA LLEGAR A DRACO DEBERAS COGER UNO A UNO LOS CINCO CANDELABROS Y DEJARLOS EN LAS HABITACIONES OSCURAS POR LAS QUE NO SE PUEDE PASAR SIN ELLOS. "
1 a$=a$+" LAS TECLAS SON: Q- ARRIBA A- ABAJOO- IZQUIERDA P- DERECHAM- SOLTAR CANDELABROS EN LAS HABITACIONES CON ESCA- LERAS HACIA ARRIBA O CON VAMPI- ROS NO PODRAS SOLTAR CANDELABROS"
1 a$=" EL CASTILLO TIENE 125 HABITA- CIONES Y CUATRO PISOS DE ALTURA. EN EL PRIMER PISO ESTA LA CRUZ SAGRADA, ES UNA ZONA DE VAMPI-ROS Y TIENE 50 SALAS. EL SEGUNDOES LA ZONA DONDE SE REPARTEN LOS"
1 a$=" DRACO ES UN VAMPIRO QUE VIVE EN UN TETRICO CASTILLO. TU MISION ES LA DE DESTRUIR EL MALEFICIO DE LOS VAMPIROS QUE YA FUERON VICTIMAS DE DRACO... "
1 a$=" ....COMIENZAS TU AVENTURA EN LA PUERTA DE ENTRADA AL CASTILLO Y TU MISION ACABARA CUANDO EL CONTADOR DE TUS LITROS DE SANGRE SE AGOTE A MEDIDA QUE TE ALCAN-ZAN LOS VAMPIROS. "
1 a$=" VILLALBA SOFT PRESENTA:
1 a$*(jae-n-1
1 a$(i)>"9"))+
1 UNO;"PONGA EN MARCHA LA CINTA";
1 Tiburcio *2
1 TZX por Manuel Gomez Amate
1 SPACE-UNO,X1
1 SPACE-UNO,CERO:
1 SPACE,LINEA:
1 SPACE,CERO:
1 RECORD=PUNTOS
1 Polino II
1 Planos I
1 PUNTOS>RECORD
1 PUNTOS=PUNTOS+20
1 PULSA ENTER
1 PANTALLAS=PANTALLAS+1
1 PANTALLAS=6
1 PANTALLAS*360
1 O$=" "
1 Micro
1 Logicos 7
1 Logicos 6
1 Logicos 5
1 Logicos 4
1 Logicos 3
1 Logicos 2 -
1 Logicos 1 :
1 I,CERO;,,:
1 Hobby Press
1 Draco
1 DOS=UNO+UNO
1 Castellano
1 Cargador \
1 Cara a Z
1 CINTA 15 CARA A
1 CERO;" ";
1 C$=C$+"*"+A$(b(i)+1
1 C$=" Por favor, elija un programa "
1 B$=E$((pe+1
1 B$="1.23456789":
1 B$="("+B$+")":
1 B$=" "
1 A$=E$((pe+1
1 A$(b(posx))=
1 A$(b(i)))+A$(b(i)+1
1 ="L")-(378
1 ;ruf;" no es un cero"
1 ;ruf;" es un cero":
1 ;q;" ";x$:
1 ;"q(";d$;")= ";q$
1 ;"p(";d$;")= ";p$;
1 ;"el polinomio tiene ";nz;" ceros dis- tintos"
1 ;"d/d";d$;"(p/q)= (p'q+pq')/q";
1 ;"TEN CUIDADO CON LOS JINETES DE LA ANEMIA(
1 ;"Selecciona opcion:";
1 ;"SANGRE.";
1 ;"RAICES":
1 ;"QUIERES JUGAR OTRA VEZ?(S/N)"
1 ;"Pulsa una tecla para volver":
1 ;"PULSE CUALQUIER TECLA."
1 ;"PULSA UNA TECLA PARA CONTINUAR":
1 ;"No memos conseguido ningun cero":
1 ;"NO PUEDO DESPEJAR ";k$;" DIRECTAMENTE":
1 ;"MANDOS: 5-IZQUIERDA 6-ABAJO 7-ARRIBA 8-DERECHA "
1 ;"Los ceros enteros del polinomioson los divisores del termino demenor grado; ";:
1 ;"LOS PROTAGONISTAS SON:
1 ;"LOS ALIMENTOS NO SE ACABARAN HASTA QUE HAGAS 5 PANTALLAS,QUE ES CUANDO HAS VENCIDO.LAS PANTALLAS VAN SIENDO CADA VEZ MAS DIFICILES.PIERDES SI ALGUN JINETE TE COME O SI <VAGAS EN LA ETERNIDAD>":
1 ;"HAS PERDIDO"
1 ;"GANASTE"
1 ;"Esto es q";
1 ;"Esto es pq'":
1 ;"Esto es p'q":
1 ;"El termino de menor grado es ";d(noc,1
1 ;"El polinomio es divisible por:";
1 ;"ESPERA UN MOMENTO"
1 ;"ENTENDIDO ?":
1 ;"EN ESTE JUEGO DEBES COMER Y BEBER EL MAYOR NUMERO POSIBLE DE ALIMENTOS,DANDOTE 20 PTOS. POR CADA ALIMENTO QUE TOMES"
1 ;"DESEAS VER LAS INSTRUCCIONES? (S/N)":
1 ;"DE ";p(1
1 ;"CALCULANDO":
1 ;"CALCULANDO"
1 ;"9) CEROS POR RUFFINI";
1 ;"8) DERIVAR p/q";
1 ;"7) DERIVAR p o q";
1 ;"10) CEROS POR ITERACION"
1 ;"(Vamos a probarlos todos)":
1 ;"(";b$;")/(";o$;")":
1 ;" TERMINASTE TU MISION Y SERAS UN VAMPIRO MAS EN EL MUNDO DE LAS TINIEBLAS.
1 ;" S -- INSTUCCIONES"'''" OTRA TECLA -- JUGAR"
1 ;" RESUELTO ":
1 ;" POR FIN. CONSEGUISTE ACABAR CON LA MALDICION DEL CASTILLO DE ",,,"D R A C O.",:
1 ;" LA ECUACION 10 SE OBTIENE SUMANDO LA 8 Y LA 9":
1 ;" Hallo primero ";z$(pr,m
1 ;" ENCONTRASTE LA CRUZ. YA PUEDES ENFRENTARTE CON DRACO. SUERTE!. "
1 ;" ESPERA. CARGANDO LINEAS DATA "
1 ;" ":
1 ;" "
1 ;" ":
1 ;" ":
1 -j1-j3,-j2-j4:
1 -d(n,der+1
1 ,n)+y(nd2-1
1 ,n)*y(nd2,n+1
1 ,gru1)=d(n,der2+1
1 ,gru)=p(n,pol+2
1 ,gru)=p(n,7
1 ,gru)=p(21
1 ,gru)=(n-1
1 ,gru)+d(n,der+1
1 ,D.L.: M-36598-84
1 +cam*(gra3-n+1
1 *** CINTA-MICROHOBBY ***
1 *(y(nd2,n-1
1 *(a$="0"):
1 )=y(nd2,n-1
1 )=x*((x>64
1 )=ruf*d(n,der+1
1 )=p(gra3-1
1 )=p(gra3,3
1 )=d(n,der+1
1 )=d(em-n-1
1 )=-d(o,deriv+1
1 )=" ")+("5"
1 );" para obtener ";k$;" de (";pr;")":
1 );" TENGO ";E$:
1 )/y(nd2,n-1
1 )/d(em-n,1
1 ),QUE TRATARAN DE IMPEDIR TU MISION,COMIENDO LOS ALIMENTOS A FIN DE QUE PASES HAMBRE(SI TOMAN DEMASIADOS, QUEDARAS VAGANDO EN LA ETERNIDAD)"
1 )+(p=fin)))=1
1 ))+"("+B$+")":
1 (x-d(m,deriv+1
1 (k$="a ")*(w1
1 (d(o,deriv+1
1 (VALOR)<"A"
1 ((v)-v0)/2/aA
1 ("+c$+")":
1 ("+B$+")^2":
1 ("+B$+")^(1/("+C$+"))":
1 ''" P U L S A E N T E R."
1 "v=v0+2*a*s"
1 "s=a/2*t^2+v0*t"
1 "s","N1","N2","f2","f1","w1","w2","a","tc","v","t","h1","h2","x1","x2"
1 "numero impar de parentesis !!!":
1 "m2*a=-m2*g*
1 "m1*a=m1*g*
1 "h1s u1","h2s u2","x1s u1","x2s u2","v a s ","s a t ","v a t "
1 "a F1Tc","a F2Tc","a F1F2","N1m1u1","N2m2u2","F1w1N1","F2w2N2"
1 "Que polinomio? (p/q) ";
1 "No hay raices reales":
1 "NO HAY ""="" !!!":
1 "MicroHobby Semanal numeros 57 a 60
1 "Mete los datos del cuerpo 2"'"m2=";m2'"u2=";u2
1 "Mete los datos del cuerpo 1"'"m1=";m1'"u1=";u1
1 "I-Logicos 5","J-Logicos 6","K-Logicos 7"
1 "Hemos sacado ";nd1;" ceros";
1 "F2=w2*N2"
1 "F1=w1*N1"
1 "EXPRESI0N NO VALIDA":
1 "ED5F6F2600110058010003EDB0",1003
1 "E-Logicos 1","F-Logicos 2","G-Logicos 3","H-Logicos 4"
1 "D3FE4110FE231520F40C20EFC9",1616
1 "CUAL ES LA INCOGNITA ? ";
1 "B120EBBA20E021004011014036",1119
1 "Algun dato mas?,sino ENTER"'
1 "A-Tiburcio","B-Planos I","C-Polino II","D-Draco"
1 "772322D6EA01E0022100581120",1033
1 "64"+NPROG)
1 "58EDB0F5CDD8EAF1FE8020D621",2303
1 "5810582100000E0016017EE618",642
1 "5";"cara: ";
1 "5";"Programa: ";
1 "5";"Programa inexistente":
1 "5";"'R' Vuelve al menu"
1 "5";"'L' Carga el programa";
1 "430","13","24","24","33","42","11","24","33","410","12","24","33","410","43","41","43","11","23","32","13","22","33","42","41":
1 "43","13","24","23","34","42","410","43","42","44","11","23","22","21","33","13","31","11","33","42","11","24","24","21","31":
1 "32"-I;C$(
1 "2B772B22D4EAC6102AD6EA7723",1543
1 "22",CERO;C$(I
1 "22",CERO;B$
1 "22",CERO;
1 "21005816000100037EFE00280A",577
1 "16FF353E10D3FEAFD3FE0B2378",1679
1 "14","33","13","34","43","13","31","42","43","42","11","24","31","12","31","43","14","23","31","43","11","24","21","24","31":
1 "13","33","140","33","430","42","42","13","31","42","42","42","11","24","31","420","11","24","23","33","11","24","24","21","31":
1 "12","32","11","22","33","42","11","23","32","42","11","24","22","22","31","13","24","32","11","33","41","14","21","24","31":
1 "0F5822D4EA2322D6EAC36DEA0F",1653
1 "00010018EDB0C93E002AD4EA77",1308
1 "-Raices reales diferentes: ";nz''"-Total raices reales: ";nz+nzr;
1 "(m1+m2)*a=m1*g*
1 " < Este es su numero":
1 " ERROR EN DATA EN LINEA ";l:
1 . . .PEPE EL HAMBRIENTO (TIBURCIO PARA LOS AMIGOS)
1 . . .PEDR0 EL CABEZON
1 . . .LUIS EL PATAS (YA AVERIGUARAS EL PORQUE DE ESTE MOTE) "
1